home *** CD-ROM | disk | FTP | other *** search
/ Risc World 3 / Risc World 3.iso / SOFTWARE / ISSUE2 / PD / CAMPINS.ZIP / DailyNatGeo < prev    next >
Text File  |  2002-05-26  |  809b  |  29 lines
  1. If "<ChangeFSI$Dir>" = "" Then Error Please open a Filer directory containing !ChangeFSI V1.15 (or better) then try again.
  2.  
  3. | This turns on or off the Hourglass when ChangeFSI is converting.
  4. | If you don't want it on Make the line below 'Off'
  5. Set ChangeFSI$Hourglass On
  6.  
  7. WimpSlot -min 2000K
  8. WimpSlot -next 2000K
  9. Set campin$dir <obey$dir>.resources
  10. Set campin$path <campin$dir>.
  11. DIR <campin$dir>
  12.  
  13.  
  14. | National Geographic Society Daily Pic.
  15. curl http://lava.nationalgeographic.com/cgi-bin/pod/wallpaper.cgi -o today -s
  16. campin:errorcheck
  17.  
  18. campin:getlink "--1024 x"
  19.  
  20. SetEVAL surl "http://lava.nationalgeographic.com/" + "<urlstring>"
  21. DO curl --env <surl> -o image -s
  22. campin:errorcheck
  23.  
  24. campin:camchk campin:Image
  25.  
  26. campin:CFSI campin:Image campin:sprite <col> <scale> -nomode { > null: }
  27.  
  28. Backdrop -C campin:sprite
  29.